// ---------------------------------------------------------------------------
//  M88 - PC-8801 emulator
//	Copyright (C) cisc 1998, 1999.
// ---------------------------------------------------------------------------
//	$Id: cfgpage.cpp,v 1.13 2003/04/22 13:16:35 cisc Exp $

#include "headers.h"
#include "resource.h"
#include "cfgpage.h"
#include "misc.h"
#include "winvars.h"

#define BSTATE(b) (b ? BST_CHECKED : BST_UNCHECKED)

using namespace PC8801;

// ---------------------------------------------------------------------------

ConfigPage::ConfigPage(Config& c, Config& oc)
: config(c), orgconfig(oc) 
{
	gate.SetDestination(PageGate, this);
}

bool ConfigPage::Init(HINSTANCE _hinst)
{
	hinst = _hinst;
	return true;
}

bool IFCALL ConfigPage::Setup(IConfigPropBase* _base, PROPSHEETPAGE* psp)
{
	base = _base;
	
	memset(psp, 0, sizeof(PROPSHEETPAGE));
	psp->dwSize = sizeof(PROPSHEETPAGE); // PROPSHEETPAGE_V1_SIZE
	psp->dwFlags = 0;
	psp->hInstance = hinst;
	psp->pszTemplate = GetTemplate();
	psp->pszIcon = 0;
	psp->pfnDlgProc = (DLGPROC) (void*) gate;
	psp->lParam = 0;
	return true;
}

BOOL ConfigPage::PageProc(HWND hdlg, UINT msg, WPARAM wp, LPARAM lp)
{
	switch (msg)
	{
	case WM_INITDIALOG:
		InitDialog(hdlg);
		return TRUE;

	case WM_NOTIFY:
		switch (((NMHDR*) lp)->code)
		{
		case PSN_SETACTIVE:
			SetActive(hdlg);
			Update(hdlg);
			base->PageSelected(this);
			break;

		case PSN_APPLY:
			Apply(hdlg);
			base->Apply();
			return PSNRET_NOERROR;
		
		case PSN_QUERYCANCEL:
			base->_ChangeVolume(false);
			return FALSE;		
		}
		return TRUE;

	case WM_COMMAND:
		if (HIWORD(wp) == BN_CLICKED)
		{
			if (Clicked(hdlg, HWND(lp), LOWORD(wp)))
			{
				base->PageChanged(hdlg);
				return TRUE;
			}
		}
		return Command(hdlg, HWND(lp), HIWORD(wp), LOWORD(wp));
	
	case WM_HSCROLL:
		UpdateSlider(hdlg);
		base->PageChanged(hdlg);
		return TRUE;
	}
	return FALSE;
}

BOOL CALLBACK ConfigPage::PageGate
(ConfigPage* config, HWND hwnd, UINT m, WPARAM w, LPARAM l)
{
	return config->PageProc(hwnd, m, w, l);
}


// ---------------------------------------------------------------------------
//	CPU Page
//
LPCSTR ConfigCPU::GetTemplate()
{
	return MAKEINTRESOURCE(IDD_CONFIG_CPU);
}

bool ConfigCPU::Clicked(HWND hdlg, HWND hwctl, UINT id)
{
	switch (id)
	{
	case IDC_CPU_NOWAIT:
		config.flags ^= Config::fullspeed;
		if (config.flags & Config::fullspeed)
			config.flags &= ~Config::cpuburst;
		Update(hdlg);
		return true;

	case IDC_CPU_BURST:
		config.flags ^= Config::cpuburst;
		if (config.flags & Config::cpuburst)
			config.flags &= ~Config::fullspeed;
		Update(hdlg);
		return true;

	case IDC_CPU_CLOCKMODE:
		config.flags ^= Config::cpuclockmode;
		return true;

	case IDC_CPU_NOSUBCPUCONTROL:
		config.flags ^= Config::subcpucontrol;
		return true;

	case IDC_CPU_MS11:
		config.cpumode = Config::ms11;
		return true;
		
	case IDC_CPU_MS21:
		config.cpumode = Config::ms21;
		return true;
		
	case IDC_CPU_MSAUTO:
		config.cpumode = Config::msauto;
		return true;
	
	case IDC_CPU_ENABLEWAIT:
		config.flags ^= Config::enablewait;
		return true;

	case IDC_CPU_FDDNOWAIT:
		config.flag2 ^= Config::fddnowait;
		return true;
	}
	return false;
}

void ConfigCPU::InitDialog(HWND hdlg)
{
	config.clock = orgconfig.clock;
	config.speed = orgconfig.speed;
	SendDlgItemMessage(hdlg, IDC_CPU_SPEED, TBM_SETLINESIZE, 0, 1);
	SendDlgItemMessage(hdlg, IDC_CPU_SPEED, TBM_SETPAGESIZE, 0, 2);
	SendDlgItemMessage(hdlg, IDC_CPU_SPEED, TBM_SETRANGE, TRUE, MAKELONG(2, 20));
	SendDlgItemMessage(hdlg, IDC_CPU_SPEED, TBM_SETPOS, FALSE, config.speed / 100);
}

void ConfigCPU::SetActive(HWND hdlg)
{
	SetFocus(GetDlgItem(hdlg, config.flags & Config::fullspeed ? IDC_CPU_NOSUBCPUCONTROL : IDC_CPU_CLOCK));
	SendDlgItemMessage(hdlg, IDC_CPU_CLOCK_SPIN, UDM_SETRANGE, 0, MAKELONG(100, 1));
	SendDlgItemMessage(hdlg, IDC_CPU_CLOCK, EM_SETLIMITTEXT, 3, 0);
	SendDlgItemMessage(hdlg, IDC_CPU_SPEED, TBM_SETRANGE, TRUE, MAKELONG(2, 20));
}

BOOL ConfigCPU::Command(HWND hdlg, HWND hwctl, UINT nc, UINT id)
{
	switch (id)
	{
	case IDC_CPU_CLOCK:
		if (nc == EN_CHANGE)
		{
			int clock = Limit(GetDlgItemInt(hdlg, IDC_CPU_CLOCK, 0, false), 100, 1)*10; 
			if (clock != config.clock)
				base->PageChanged(hdlg);
			config.clock = clock;
			return TRUE;
		}
		break;
	}
	return FALSE;
}

void ConfigCPU::Update(HWND hdlg)
{
	SetDlgItemInt(hdlg, IDC_CPU_CLOCK, config.clock/10, false);
	CheckDlgButton(hdlg, IDC_CPU_NOWAIT, BSTATE(config.flags & Config::fullspeed));
	
	EnableWindow(GetDlgItem(hdlg, IDC_CPU_CLOCK), !(config.flags & Config::fullspeed));
	
	EnableWindow(GetDlgItem(hdlg, IDC_CPU_SPEED), !(config.flags & Config::cpuburst));
	EnableWindow(GetDlgItem(hdlg, IDC_CPU_SPEED_TEXT), !(config.flags & Config::cpuburst));
	
	CheckDlgButton(hdlg, IDC_CPU_NOSUBCPUCONTROL, BSTATE(!(config.flags & Config::subcpucontrol)));
	CheckDlgButton(hdlg, IDC_CPU_CLOCKMODE, BSTATE(config.flags & Config::cpuclockmode));
	CheckDlgButton(hdlg, IDC_CPU_BURST, BSTATE(config.flags & Config::cpuburst));
	CheckDlgButton(hdlg, IDC_CPU_FDDNOWAIT, BSTATE(!(config.flag2 & Config::fddnowait)));
	UpdateSlider(hdlg);

	static const int item[4] = 
	{ IDC_CPU_MS11, IDC_CPU_MS21, IDC_CPU_MSAUTO, IDC_CPU_MSAUTO };
	CheckDlgButton(hdlg, item[config.cpumode & 3], BSTATE(true));
	CheckDlgButton(hdlg, IDC_CPU_ENABLEWAIT, BSTATE(config.flags & Config::enablewait));
}

void ConfigCPU::UpdateSlider(HWND hdlg)
{
	char buf[8];
	config.speed = SendDlgItemMessage(hdlg, IDC_CPU_SPEED, TBM_GETPOS, 0, 0) * 100;
	wsprintf(buf, "%d%%", config.speed/10);
	SetDlgItemText(hdlg, IDC_CPU_SPEED_TEXT, buf);
}


// ---------------------------------------------------------------------------
//	Screen Page
//
LPCSTR ConfigScreen::GetTemplate()
{
	return MAKEINTRESOURCE(IDD_CONFIG_SCREEN);
}

bool ConfigScreen::Clicked(HWND hdlg, HWND hwctl, UINT id)
{
	switch (id)
	{
	case IDC_SCREEN_REFRESH_1:
		config.refreshtiming = 1; 
		return true;

	case IDC_SCREEN_REFRESH_2:
		config.refreshtiming = 2; 
		return true;
	
	case IDC_SCREEN_REFRESH_3:
		config.refreshtiming = 3; 
		return true;
	
	case IDC_SCREEN_REFRESH_4:
		config.refreshtiming = 4; 
		return true;

	case IDC_SCREEN_ENABLEPCG:
		config.flags ^= Config::enablepcg;
		return true;

	case IDC_SCREEN_FV15K:
		config.flags ^= Config::fv15k;
		return true;

	case IDC_SCREEN_DIGITALPAL:
		config.flags ^= Config::digitalpalette;
		return true;

	case IDC_SCREEN_FORCE480:
		config.flags ^= Config::force480;
		return true;

	case IDC_SCREEN_LOWPRIORITY:
		config.flags ^= Config::drawprioritylow;
		return true;
	
	case IDC_SCREEN_FULLLINE:
		config.flags ^= Config::fullline;
		return true;

	case IDC_SCREEN_VSYNC:
		config.flag2 ^= Config::synctovsync;
		return true;
	}
	return false;
}

void ConfigScreen::Update(HWND hdlg)
{
	static const int item[4] = 
	{ IDC_SCREEN_REFRESH_1, IDC_SCREEN_REFRESH_2, IDC_SCREEN_REFRESH_3, IDC_SCREEN_REFRESH_4 }; 
	CheckDlgButton(hdlg, item[(config.refreshtiming-1) & 3], BSTATE(true));

	// misc. option
	CheckDlgButton(hdlg, IDC_SCREEN_ENABLEPCG, BSTATE(config.flags & Config::enablepcg));
	CheckDlgButton(hdlg, IDC_SCREEN_FV15K, BSTATE(config.flags & Config::fv15k));
	CheckDlgButton(hdlg, IDC_SCREEN_DIGITALPAL, BSTATE(config.flags & Config::digitalpalette));
	CheckDlgButton(hdlg, IDC_SCREEN_FORCE480, BSTATE(config.flags & Config::force480));
	CheckDlgButton(hdlg, IDC_SCREEN_LOWPRIORITY, BSTATE(config.flags & Config::drawprioritylow));
	CheckDlgButton(hdlg, IDC_SCREEN_FULLLINE, BSTATE(config.flags & Config::fullline));

	bool f = (config.flags & Config::fullspeed) 
		  || (config.flags & Config::cpuburst)
		  || (config.speed != 1000);
	CheckDlgButton(hdlg, IDC_SCREEN_VSYNC, BSTATE(config.flag2 & Config::synctovsync));
	EnableWindow(GetDlgItem(hdlg, IDC_SCREEN_VSYNC), BSTATE(!f));
}



// ---------------------------------------------------------------------------
//	Sound Page
//
LPCSTR ConfigSound::GetTemplate()
{
	return MAKEINTRESOURCE(IDD_CONFIG_SOUND);
}

bool ConfigSound::Clicked(HWND hdlg, HWND hwctl, UINT id)
{
	switch (id)
	{
	case IDC_SOUND44_OPN:
		config.flags &= ~Config::enableopna;
		config.flag2 &= ~Config::disableopn44;
		return true;

	case IDC_SOUND44_OPNA:
		config.flags |= Config::enableopna;
		config.flag2 &= ~Config::disableopn44;
		return true;

	case IDC_SOUND44_NONE:
		config.flags &= ~Config::enableopna;
		config.flag2 |= Config::disableopn44;
		return true;

	case IDC_SOUNDA8_OPN:
		config.flags = (config.flags & ~Config::opnaona8) | Config::opnona8;
		return true;

	case IDC_SOUNDA8_OPNA:
		config.flags = (config.flags & ~Config::opnona8) | Config::opnaona8;
		return true;

	case IDC_SOUNDA8_NONE:
		config.flags = config.flags & ~(Config::opnaona8 | Config::opnona8);
		return true;

	case IDC_SOUND_CMDSING:
		config.flags ^= Config::disablesing;
		return true;

	case IDC_SOUND_MIXALWAYS:
		config.flags ^= Config::mixsoundalways;
		return true;

	case IDC_SOUND_PRECISEMIX:
		config.flags ^= Config::precisemixing;
		return true;

	case IDC_SOUND_WAVEOUT:
		config.flag2 ^= Config::usewaveoutdrv;
		return true;

	case IDC_SOUND_NOSOUND:
		config.sound = 0; 
		return true;

//	case IDC_SOUND_11K:
//		config.sound = 11025; 
//		return true;

	case IDC_SOUND_22K:
		config.sound = 22050; 
		return true;

	case IDC_SOUND_44K:
		config.sound = 44100; 
		return true;
	
	case IDC_SOUND_48K:
		config.sound = 48000;
		return true;

	case IDC_SOUND_88K:
		config.sound = 88200; 
		return true;

	case IDC_SOUND_96K:
		config.sound = 96000;
		return true;

	case IDC_SOUND_55K:
		config.sound = 55467;
		return true;

	case IDC_SOUND_FMFREQ:
		config.flag2 ^= Config::usefmclock;
		return true;

	case IDC_SOUND_USENOTIFY:
		config.flag2 ^= Config::usedsnotify;
		return true;

	case IDC_SOUND_LPF:
		config.flag2 ^= Config::lpfenable;
		EnableWindow(GetDlgItem(hdlg, IDC_SOUND_LPFFC), !!(config.flag2 & Config::lpfenable));
		EnableWindow(GetDlgItem(hdlg, IDC_SOUND_LPFORDER), !!(config.flag2 & Config::lpfenable));
		return true;
	}
	return false;
}

void ConfigSound::InitDialog(HWND hdlg)
{
	config.soundbuffer = orgconfig.soundbuffer;
	CheckDlgButton(hdlg, 
		config.flag2 & Config::disableopn44 ? IDC_SOUND44_NONE : 
		(config.flags & Config::enableopna ? IDC_SOUND44_OPNA : IDC_SOUND44_OPN), 
		BSTATE(true));
	CheckDlgButton(hdlg, 
		config.flags & Config::opnaona8 ? IDC_SOUNDA8_OPNA : 
		(config.flags & Config::opnona8 ? IDC_SOUNDA8_OPN : IDC_SOUNDA8_NONE), 
		BSTATE(true));
}

void ConfigSound::SetActive(HWND hdlg)
{
	UDACCEL ud[2] = { { 0, 10 }, { 1, 100 } };
	SendDlgItemMessage(hdlg, IDC_SOUND_BUFFERSPIN, UDM_SETRANGE, 0, MAKELONG(1000, 50));
	SendDlgItemMessage(hdlg, IDC_SOUND_BUFFERSPIN, UDM_SETACCEL, 2, (LPARAM) ud);
	SendDlgItemMessage(hdlg, IDC_SOUND_BUFFER, EM_SETLIMITTEXT, 4, 0);
	SendDlgItemMessage(hdlg, IDC_SOUND_LPFFC, EM_SETLIMITTEXT, 2, 0);
	SendDlgItemMessage(hdlg, IDC_SOUND_LPFORDER, EM_SETLIMITTEXT, 2, 0);
}

BOOL ConfigSound::Command(HWND hdlg, HWND hwctl, UINT nc, UINT id)
{
	switch (id)
	{
	case IDC_SOUND_BUFFER:
		if (nc == EN_CHANGE)
		{
			uint buf;
			buf = Limit(GetDlgItemInt(hdlg, IDC_SOUND_BUFFER, 0, false), 1000, 50) / 10 * 10; 
			if (buf != config.soundbuffer)
				base->PageChanged(hdlg);
			config.soundbuffer = buf;
			return TRUE;
		}
		break;
	
	case IDC_SOUND_LPFFC:
		if (nc == EN_CHANGE)
		{
			uint buf = Limit(GetDlgItemInt(hdlg, IDC_SOUND_LPFFC, 0, false), 24, 3) * 1000; 
			if (buf != config.lpffc)
				base->PageChanged(hdlg);
			config.lpffc = buf;
			return TRUE;
		}
		break;

	case IDC_SOUND_LPFORDER:
		if (nc == EN_CHANGE)
		{
			uint buf = Limit(GetDlgItemInt(hdlg, IDC_SOUND_LPFORDER, 0, false), 16, 2) / 2 * 2; 
			if (buf != config.lpforder)
				base->PageChanged(hdlg);
			config.lpforder = buf;
			return TRUE;
		}
		break;
	}
	return FALSE;
}

void ConfigSound::Update(HWND hdlg)
{
	CheckDlgButton(hdlg, IDC_SOUND_NOSOUND,	BSTATE(config.sound ==     0));
//	CheckDlgButton(hdlg, IDC_SOUND_11K,		BSTATE(config.sound == 11025));
	CheckDlgButton(hdlg, IDC_SOUND_22K,		BSTATE(config.sound == 22100));
	CheckDlgButton(hdlg, IDC_SOUND_44K,		BSTATE(config.sound == 44100));
	CheckDlgButton(hdlg, IDC_SOUND_48K,		BSTATE(config.sound == 48000));
	CheckDlgButton(hdlg, IDC_SOUND_55K,		BSTATE(config.sound == 55467));
	CheckDlgButton(hdlg, IDC_SOUND_88K,		BSTATE(config.sound == 88200));
	CheckDlgButton(hdlg, IDC_SOUND_96K,		BSTATE(config.sound == 96000));

	CheckDlgButton(hdlg, IDC_SOUND_CMDSING,	   BSTATE(!(config.flags & Config::disablesing)));
	CheckDlgButton(hdlg, IDC_SOUND_MIXALWAYS,  BSTATE(  config.flags & Config::mixsoundalways));
	CheckDlgButton(hdlg, IDC_SOUND_PRECISEMIX, BSTATE(  config.flags & Config::precisemixing));
	CheckDlgButton(hdlg, IDC_SOUND_WAVEOUT,    BSTATE(  config.flag2 & Config::usewaveoutdrv));
	CheckDlgButton(hdlg, IDC_SOUND_FMFREQ,     BSTATE(  config.flag2 & Config::usefmclock));
	CheckDlgButton(hdlg, IDC_SOUND_LPF,        BSTATE(  config.flag2 & Config::lpfenable));
	CheckDlgButton(hdlg, IDC_SOUND_USENOTIFY,     BSTATE(  config.flag2 & Config::usedsnotify));
	
	SetDlgItemInt(hdlg, IDC_SOUND_BUFFER, config.soundbuffer, false);
	SetDlgItemInt(hdlg, IDC_SOUND_LPFFC, config.lpffc / 1000, false);
	SetDlgItemInt(hdlg, IDC_SOUND_LPFORDER, config.lpforder, false);
	
	EnableWindow(GetDlgItem(hdlg, IDC_SOUND_LPFFC), !!(config.flag2 & Config::lpfenable));
	EnableWindow(GetDlgItem(hdlg, IDC_SOUND_LPFORDER), !!(config.flag2 & Config::lpfenable));
}

// ---------------------------------------------------------------------------
//	Volume Page
//
LPCSTR ConfigVolume::GetTemplate()
{
	return MAKEINTRESOURCE(IDD_CONFIG_SOUNDVOL);
}

bool ConfigVolume::Clicked(HWND hdlg, HWND hwctl, UINT id)
{
	switch (id)
	{
	case IDC_SOUND_RESETVOL:
		SendDlgItemMessage(hdlg, IDC_SOUND_VOLFM,     TBM_SETPOS, TRUE, 0);
		SendDlgItemMessage(hdlg, IDC_SOUND_VOLSSG,    TBM_SETPOS, TRUE, 0);
		SendDlgItemMessage(hdlg, IDC_SOUND_VOLADPCM,  TBM_SETPOS, TRUE, 0);
		SendDlgItemMessage(hdlg, IDC_SOUND_VOLRHYTHM, TBM_SETPOS, TRUE, 0);
		UpdateSlider(hdlg);
		break;

	case IDC_SOUND_RESETRHYTHM:
		SendDlgItemMessage(hdlg, IDC_SOUND_VOLBD,     TBM_SETPOS, TRUE, 0);
		SendDlgItemMessage(hdlg, IDC_SOUND_VOLSD,     TBM_SETPOS, TRUE, 0);
		SendDlgItemMessage(hdlg, IDC_SOUND_VOLTOP,    TBM_SETPOS, TRUE, 0);
		SendDlgItemMessage(hdlg, IDC_SOUND_VOLHH,     TBM_SETPOS, TRUE, 0);
		SendDlgItemMessage(hdlg, IDC_SOUND_VOLTOM,    TBM_SETPOS, TRUE, 0);
		SendDlgItemMessage(hdlg, IDC_SOUND_VOLRIM,    TBM_SETPOS, TRUE, 0);
		UpdateSlider(hdlg);
		break;
	}
	return true;
}

void ConfigVolume::InitVolumeSlider(HWND hdlg, UINT id, int val)
{
	SendDlgItemMessage(hdlg, id, TBM_SETLINESIZE, 0, 1);
	SendDlgItemMessage(hdlg, id, TBM_SETPAGESIZE, 0, 5);
	SendDlgItemMessage(hdlg, id, TBM_SETRANGE, TRUE, MAKELONG(-40, 20));
	SendDlgItemMessage(hdlg, id, TBM_SETPOS, FALSE, val);
}

void ConfigVolume::InitDialog(HWND hdlg)
{
	InitVolumeSlider(hdlg, IDC_SOUND_VOLFM,     orgconfig.volfm);
	InitVolumeSlider(hdlg, IDC_SOUND_VOLSSG,    orgconfig.volssg);
	InitVolumeSlider(hdlg, IDC_SOUND_VOLADPCM,  orgconfig.voladpcm);
	InitVolumeSlider(hdlg, IDC_SOUND_VOLRHYTHM, orgconfig.volrhythm);
	InitVolumeSlider(hdlg, IDC_SOUND_VOLBD,     orgconfig.volbd);
	InitVolumeSlider(hdlg, IDC_SOUND_VOLSD,     orgconfig.volsd);
	InitVolumeSlider(hdlg, IDC_SOUND_VOLTOP,    orgconfig.voltop);
	InitVolumeSlider(hdlg, IDC_SOUND_VOLHH,     orgconfig.volhh);
	InitVolumeSlider(hdlg, IDC_SOUND_VOLTOM,    orgconfig.voltom);
	InitVolumeSlider(hdlg, IDC_SOUND_VOLRIM,    orgconfig.volrim);
}

void ConfigVolume::SetActive(HWND hdlg)
{
	UpdateSlider(hdlg);
	SendDlgItemMessage(hdlg, IDC_SOUND_VOLFM,     TBM_SETRANGE, TRUE, MAKELONG(-40, 20));
	SendDlgItemMessage(hdlg, IDC_SOUND_VOLSSG,    TBM_SETRANGE, TRUE, MAKELONG(-40, 20));
	SendDlgItemMessage(hdlg, IDC_SOUND_VOLADPCM,  TBM_SETRANGE, TRUE, MAKELONG(-40, 20));
	SendDlgItemMessage(hdlg, IDC_SOUND_VOLRHYTHM, TBM_SETRANGE, TRUE, MAKELONG(-40, 20));
	SendDlgItemMessage(hdlg, IDC_SOUND_VOLBD,     TBM_SETRANGE, TRUE, MAKELONG(-40, 20));
	SendDlgItemMessage(hdlg, IDC_SOUND_VOLSD,     TBM_SETRANGE, TRUE, MAKELONG(-40, 20));
	SendDlgItemMessage(hdlg, IDC_SOUND_VOLTOP,    TBM_SETRANGE, TRUE, MAKELONG(-40, 20));
	SendDlgItemMessage(hdlg, IDC_SOUND_VOLHH,     TBM_SETRANGE, TRUE, MAKELONG(-40, 20));
	SendDlgItemMessage(hdlg, IDC_SOUND_VOLTOM,    TBM_SETRANGE, TRUE, MAKELONG(-40, 20));
	SendDlgItemMessage(hdlg, IDC_SOUND_VOLRIM,    TBM_SETRANGE, TRUE, MAKELONG(-40, 20));
}

void ConfigVolume::Apply(HWND hdlg)
{
	config.volfm     = SendDlgItemMessage(hdlg, IDC_SOUND_VOLFM,     TBM_GETPOS, 0, 0);
	config.volssg    = SendDlgItemMessage(hdlg, IDC_SOUND_VOLSSG,    TBM_GETPOS, 0, 0);
	config.voladpcm  = SendDlgItemMessage(hdlg, IDC_SOUND_VOLADPCM,  TBM_GETPOS, 0, 0);
	config.volrhythm = SendDlgItemMessage(hdlg, IDC_SOUND_VOLRHYTHM, TBM_GETPOS, 0, 0);
	config.volbd     = SendDlgItemMessage(hdlg, IDC_SOUND_VOLBD,     TBM_GETPOS, 0, 0);
	config.volsd     = SendDlgItemMessage(hdlg, IDC_SOUND_VOLSD,     TBM_GETPOS, 0, 0);
	config.voltop    = SendDlgItemMessage(hdlg, IDC_SOUND_VOLTOP,    TBM_GETPOS, 0, 0);
	config.volhh     = SendDlgItemMessage(hdlg, IDC_SOUND_VOLHH,     TBM_GETPOS, 0, 0);
	config.voltom    = SendDlgItemMessage(hdlg, IDC_SOUND_VOLTOM,    TBM_GETPOS, 0, 0);
	config.volrim    = SendDlgItemMessage(hdlg, IDC_SOUND_VOLRIM,    TBM_GETPOS, 0, 0);
}

void ConfigVolume::UpdateSlider(HWND hdlg)
{
	config.volfm     = SendDlgItemMessage(hdlg, IDC_SOUND_VOLFM,     TBM_GETPOS, 0, 0);
	config.volssg    = SendDlgItemMessage(hdlg, IDC_SOUND_VOLSSG,    TBM_GETPOS, 0, 0);
	config.voladpcm  = SendDlgItemMessage(hdlg, IDC_SOUND_VOLADPCM,  TBM_GETPOS, 0, 0);
	config.volrhythm = SendDlgItemMessage(hdlg, IDC_SOUND_VOLRHYTHM, TBM_GETPOS, 0, 0);
	config.volbd     = SendDlgItemMessage(hdlg, IDC_SOUND_VOLBD,     TBM_GETPOS, 0, 0);
	config.volsd     = SendDlgItemMessage(hdlg, IDC_SOUND_VOLSD,     TBM_GETPOS, 0, 0);
	config.voltop    = SendDlgItemMessage(hdlg, IDC_SOUND_VOLTOP,    TBM_GETPOS, 0, 0);
	config.volhh     = SendDlgItemMessage(hdlg, IDC_SOUND_VOLHH,     TBM_GETPOS, 0, 0);
	config.voltom    = SendDlgItemMessage(hdlg, IDC_SOUND_VOLTOM,    TBM_GETPOS, 0, 0);
	config.volrim    = SendDlgItemMessage(hdlg, IDC_SOUND_VOLRIM,    TBM_GETPOS, 0, 0);
	SetVolumeText(hdlg, IDC_SOUND_VOLTXTFM,     config.volfm);
	SetVolumeText(hdlg, IDC_SOUND_VOLTXTSSG,    config.volssg);
	SetVolumeText(hdlg, IDC_SOUND_VOLTXTADPCM,  config.voladpcm);
	SetVolumeText(hdlg, IDC_SOUND_VOLTXTRHYTHM, config.volrhythm);
	SetVolumeText(hdlg, IDC_SOUND_VOLTXTBD,     config.volbd);
	SetVolumeText(hdlg, IDC_SOUND_VOLTXTSD,     config.volsd);
	SetVolumeText(hdlg, IDC_SOUND_VOLTXTTOP,    config.voltop);
	SetVolumeText(hdlg, IDC_SOUND_VOLTXTHH,     config.volhh);
	SetVolumeText(hdlg, IDC_SOUND_VOLTXTTOM,    config.voltom);
	SetVolumeText(hdlg, IDC_SOUND_VOLTXTRIM,    config.volrim);
	base->_ChangeVolume(true);
}

void ConfigVolume::SetVolumeText(HWND hdlg, int id, int val)
{
	if (val > -40)
		SetDlgItemInt(hdlg, id, val, TRUE);
	else
		SetDlgItemText(hdlg, id, "Mute");
}

// ---------------------------------------------------------------------------
//	Function Page
//
LPCSTR ConfigFunction::GetTemplate()
{
	return MAKEINTRESOURCE(IDD_CONFIG_FUNCTION);
}

bool ConfigFunction::Clicked(HWND hdlg, HWND hwctl, UINT id)
{
	switch (id)
	{
	case IDC_FUNCTION_SAVEDIR:
		config.flags ^= Config::savedirectory;
		return true;

	case IDC_FUNCTION_ASKBEFORERESET:
		config.flags ^= Config::askbeforereset;
		return true;

	case IDC_FUNCTION_SUPPRESSMENU:
		config.flags ^= Config::suppressmenu;
		if (config.flags & Config::suppressmenu)
			config.flags &= ~Config::enablemouse;
		Update(hdlg);
		return true;
	
	case IDC_FUNCTION_USEARROWFOR10:
		config.flags ^= Config::usearrowfor10;
		return true;
	
	case IDC_FUNCTION_SWAPPADBUTTONS:
		config.flags ^= Config::swappadbuttons;
		return true;

	case IDC_FUNCTION_ENABLEPAD:
		config.flags ^= Config::enablepad;
		if (config.flags & Config::enablepad)
			config.flags &= ~Config::enablemouse;
		Update(hdlg);
		return true;

	case IDC_FUNCTION_ENABLEMOUSE:
		config.flags ^= Config::enablemouse;
		if (config.flags & Config::enablemouse)
			config.flags &= ~(Config::enablepad | Config::suppressmenu);
		Update(hdlg);
		return true;

	case IDC_FUNCTION_RESETF12:
		config.flags ^= Config::disablef12reset;
		return true;

	case IDC_FUNCTION_MOUSEJOY:
		config.flags ^= Config::mousejoymode;
		return true;

	case IDC_FUNCTION_SCREENSHOT_NAME:
		config.flag2 ^= Config::genscrnshotname;
		return true;

	case IDC_FUNCTION_COMPSNAP:
		config.flag2 ^= Config::compresssnapshot;
		return true;
	}
	return false;
}

void ConfigFunction::InitDialog(HWND hdlg)
{
	config.mousesensibility = orgconfig.mousesensibility;
	SendDlgItemMessage(hdlg, IDC_FUNCTION_MOUSESENSE, TBM_SETLINESIZE, 0, 1);
	SendDlgItemMessage(hdlg, IDC_FUNCTION_MOUSESENSE, TBM_SETPAGESIZE, 0, 4);
	SendDlgItemMessage(hdlg, IDC_FUNCTION_MOUSESENSE, TBM_SETRANGE, TRUE, MAKELONG(1, 10));
	SendDlgItemMessage(hdlg, IDC_FUNCTION_MOUSESENSE, TBM_SETPOS, FALSE, config.mousesensibility);
}

void ConfigFunction::SetActive(HWND hdlg)
{
	SendDlgItemMessage(hdlg, IDC_FUNCTION_MOUSESENSE, TBM_SETRANGE, TRUE, MAKELONG(1, 10));
}


void ConfigFunction::Update(HWND hdlg)
{
	CheckDlgButton(hdlg, IDC_FUNCTION_SAVEDIR, BSTATE(config.flags & Config::savedirectory));
	CheckDlgButton(hdlg, IDC_FUNCTION_ASKBEFORERESET, BSTATE(config.flags & Config::askbeforereset));
	CheckDlgButton(hdlg, IDC_FUNCTION_SUPPRESSMENU, BSTATE(config.flags & Config::suppressmenu));
	CheckDlgButton(hdlg, IDC_FUNCTION_USEARROWFOR10, BSTATE(config.flags & Config::usearrowfor10));
	CheckDlgButton(hdlg, IDC_FUNCTION_ENABLEPAD, BSTATE(config.flags & Config::enablepad) != 0);
	EnableWindow(GetDlgItem(hdlg, IDC_FUNCTION_SWAPPADBUTTONS), (config.flags & Config::enablepad));
	CheckDlgButton(hdlg, IDC_FUNCTION_SWAPPADBUTTONS, BSTATE(config.flags & Config::swappadbuttons));
	CheckDlgButton(hdlg, IDC_FUNCTION_RESETF12, BSTATE(!(config.flags & Config::disablef12reset)));
	CheckDlgButton(hdlg, IDC_FUNCTION_ENABLEMOUSE, BSTATE(config.flags & Config::enablemouse));
	CheckDlgButton(hdlg, IDC_FUNCTION_MOUSEJOY, BSTATE(config.flags & Config::mousejoymode));
	EnableWindow(GetDlgItem(hdlg, IDC_FUNCTION_MOUSEJOY), (config.flags & Config::enablemouse) != 0);
	CheckDlgButton(hdlg, IDC_FUNCTION_SCREENSHOT_NAME, BSTATE(config.flag2 & Config::genscrnshotname));
	CheckDlgButton(hdlg, IDC_FUNCTION_COMPSNAP, BSTATE(config.flag2 & Config::compresssnapshot));
}

void ConfigFunction::UpdateSlider(HWND hdlg)
{
	config.mousesensibility = SendDlgItemMessage(hdlg, IDC_FUNCTION_PADSENSE, TBM_GETPOS, 0, 0);
}


// ---------------------------------------------------------------------------
//	Switch Page
//
LPCSTR ConfigSwitch::GetTemplate()
{
	return MAKEINTRESOURCE(IDD_CONFIG_SWITCHES);
}

bool ConfigSwitch::Clicked(HWND hdlg, HWND hwctl, UINT id)
{
	if (IDC_DIPSW_1H <= id && id <= IDC_DIPSW_CL)
	{
		int n = (id - IDC_DIPSW_1H) / 2;
		int s = (id - IDC_DIPSW_1H) & 1;

		if (!s)	// ON
			config.dipsw &= ~(1 << n);
		else
			config.dipsw |= 1 << n;
		return true;
	}

	switch (id)
	{
	case IDC_DIPSW_DEFAULT:
		config.dipsw = 1829;
		Update(hdlg);
		return true;
	}
	return false;
}

void ConfigSwitch::Update(HWND hdlg)
{
	for (int i=0; i<12; i++)
	{
		CheckDlgButton(hdlg, IDC_DIPSW_1L + i*2, BSTATE(0 != (config.dipsw & (1 << i))));
		CheckDlgButton(hdlg, IDC_DIPSW_1H + i*2, BSTATE(0 == (config.dipsw & (1 << i))));
	}
}

// ---------------------------------------------------------------------------
//	Env Page
//
LPCSTR ConfigEnv::GetTemplate()
{
	return MAKEINTRESOURCE(IDD_CONFIG_ENV);
}

bool ConfigEnv::Clicked(HWND hdlg, HWND hwctl, UINT id)
{
	switch (id)
	{
	case IDC_ENV_KEY98:
		config.keytype = Config::PC98;
		return true;

	case IDC_ENV_KEY106:
		config.keytype = Config::AT106;
		return true;

	case IDC_ENV_PLACESBAR:
		config.flag2 ^= Config::showplacesbar;
		return true;
	}
	return false;
}

void ConfigEnv::Update(HWND hdlg)
{
	static const int item[2] = 
	{ IDC_ENV_KEY106, IDC_ENV_KEY98 };
	CheckDlgButton(hdlg, item[(config.keytype) & 1], BSTATE(true));
	CheckDlgButton(hdlg, IDC_ENV_PLACESBAR, BSTATE(config.flag2 & Config::showplacesbar));
	EnableWindow(GetDlgItem(hdlg, IDC_ENV_PLACESBAR), WINVAR(MajorVer) >= 5);
}



// ---------------------------------------------------------------------------
//	ROMEO Page
//
LPCSTR ConfigROMEO::GetTemplate()
{
	return MAKEINTRESOURCE(IDD_CONFIG_ROMEO);
}

bool ConfigROMEO::Clicked(HWND hdlg, HWND hwctl, UINT id)
{
	return true;
}

void ConfigROMEO::InitSlider(HWND hdlg, UINT id, int val)
{
	SendDlgItemMessage(hdlg, id, TBM_SETLINESIZE, 0, 1);
	SendDlgItemMessage(hdlg, id, TBM_SETPAGESIZE, 0, 10);
	SendDlgItemMessage(hdlg, id, TBM_SETRANGE, TRUE, MAKELONG(0, 500));
	SendDlgItemMessage(hdlg, id, TBM_SETPOS, FALSE, val);
}

void ConfigROMEO::InitDialog(HWND hdlg)
{
	InitSlider(hdlg, IDC_ROMEO_LATENCY,    orgconfig.romeolatency);
}

void ConfigROMEO::SetActive(HWND hdlg)
{
	UpdateSlider(hdlg);
	SendDlgItemMessage(hdlg, IDC_ROMEO_LATENCY, TBM_SETRANGE, TRUE, MAKELONG(0, 500));
}

void ConfigROMEO::Apply(HWND hdlg)
{
	config.romeolatency     = SendDlgItemMessage(hdlg, IDC_ROMEO_LATENCY,     TBM_GETPOS, 0, 0);
}

void ConfigROMEO::UpdateSlider(HWND hdlg)
{
	config.romeolatency     = SendDlgItemMessage(hdlg, IDC_ROMEO_LATENCY,     TBM_GETPOS, 0, 0);
	SetText(hdlg, IDC_ROMEO_LATENCY_TEXT, config.romeolatency);
	base->_ChangeVolume(true);
}

void ConfigROMEO::SetText(HWND hdlg, int id, int val)
{
	char buf[16];
	wsprintf(buf, "%d ms", val);
	SetDlgItemText(hdlg, id, buf);
}
